home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1994 October / 1994-10b.d64 / sprite ldr.bas (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  190b  |  6 lines
  1. 10 rem basic sprite file loader
  2. 20 s=128*64:rem 128 = sprite block number
  3. 30 open1,8,4,"filename":rem use filename of desired sprite
  4. 40 b$=chr$(0):fora=stos+4096:get#1,a$:pokea,asc(a$+b$): ifst=.thennext
  5. 50 close1
  6.